home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 726-750 / 745 / arexxbox / rxif / rx_fault.c < prev    next >
Text File  |  1995-03-18  |  684b  |  40 lines
  1.  
  2. void rx_fault( struct RexxHost *host, struct rxd_fault **rxd, long action )
  3. {
  4.     struct rxd_fault *rd = *rxd;
  5.  
  6.     switch( action )
  7.     {
  8.         case RXIF_INIT:
  9.             *rxd = calloc( sizeof *rd, 1 );
  10.             break;
  11.             
  12.         case RXIF_ACTION:
  13.             /* Insert your code HERE */
  14.             if( rd->res.description = malloc(256) )
  15.             {
  16.                 if( !Fault( *rd->arg.number, "DESC",
  17.                     rd->res.description, 256 ) )
  18.                 {
  19.                     rd->rc = -10;
  20.                     rd->rc2 = (long) "FAULT failed";
  21.                 }
  22.             }
  23.             else
  24.             {
  25.                 rd->rc = 10;
  26.                 rd->rc2 = ERROR_NO_FREE_STORE;
  27.             }
  28.             break;
  29.         
  30.         case RXIF_FREE:
  31.             /* FREE your local data HERE */
  32.             if( rd->res.description )
  33.                 free( rd->res.description );
  34.             free( rd );
  35.             break;
  36.     }
  37.     return;
  38. }
  39.  
  40.